home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 14 / CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso / CUCD / Utilities / Rainboot2 / configs / Demo.rexx < prev   
OS/2 REXX Batch file  |  1997-06-14  |  2KB  |  36 lines

  1. /* 
  2. ** The arexx part of demo.config for Rainboot2
  3. ** Written by Kimmo 'Rainy' Pekkola
  4. */
  5.  
  6. If ~SHOW('P', "RAINBOOTREXX") THEN DO
  7.   SAY "Rainboot2 must be running!"
  8.   EXIT 0
  9. END
  10.  
  11. RET='0A'x
  12.  
  13. Def.0 = "Real programmers don't comment their code."||RET||"If it was hard to write, it should be hard to understand."
  14. Def.1 = "Real programmers don't document. "||RET||"Documentation is for wimps who can't read the listings or object deck."
  15. Def.2 = "Real programmers don't draw flowcharts. "||RET||"Cavemen drew flowcharts and look how much good it did them."
  16. Def.3 = "Real programmers don't write in APL, "||RET||"unless the whole program can be written on one line."
  17. Def.4 = "Real programmers don't write in BASIC. "||RET||"Actually, no programmers write in BASIC, after the age of 12."
  18. Def.5 = "Real programmers don't write in LISP. "||RET||"Only faggot programs contain more parenthesis than actual code."
  19. Def.6 = "Real programmers don't write in "C". There has to be something wrong "||RET||"with a language who's next generation gets a lower grade then its prior."
  20. Def.7 = "Real programmers write in the machine's native binary code, "||RET||"ASM macros are those who can't divide HEX numbers in their head."
  21. Def.8 = "Real programmers don't write specs - users should consider themselves lucky "||RET||"to get any programs at all and take what they get."
  22. Def.9 = "Real programmers scorn floating-point arithmetic. The decimal point was "||RET||"invented for pansy bed wetters who are unable to think big."
  23.  
  24. Aika=TIME()
  25. Nro=RIGHT(aika, 1)
  26.  
  27. ADDRESS RAINBOOTREXX
  28.  
  29. WAITFOREND
  30.  
  31. SENDSTR "%F1%C2%D3%Y350%X50%RS0Programmers definition number "||Nro||":%RN"||RET||RET||Def.Nro
  32.  
  33. WAITFOREND
  34.  
  35. SENDSTR "%D50   %D4%E1%F2%C2%X230%Y150"||RET||"Be sure to check%B3%C15%RE0%X195%Y320"||RET||"http://www.iki.fi/~rainy%C2%RN%X70%Y370"||RET||"For more example configs and the latest releases!"||RET||RET||"%F1%C0%X230"||RET||"%D0Push%D30 %D0left%D30 %D0mousebutton%D30 %D0to%D30 %D0exit!"
  36.